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1 Keep Instance In Room 
This keeps the instance within the room’s boundary. 
Assumes sprite origin as center. 


x=Clamp (x,0+sprite width/2,room width- 
sprite width/2); 


y=clamp(y,0+sprite height/2,room height- 
sprite height/2); 


//example movement code 


. 


E 


hor = keyboard check(ord("A"))- 
keyboard check(ord("D")) 


ver = keyboard check(ord("W"))- 
keyboard check (ога ("5")); 


x-x-thor; 


у-утуег; 
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2 Line Of Sight 


This assumes you have three objects obj_ player, 

obj wall, obj enemy. This example looks for a line of 
site from enemy to player. This example assumes 
sprite origins as center. 


Create Event: 
hidding-false; 
Step Event: 


if collision line(x,y,ob) player.x, 
obj player.y,obj wall,true,true) 


{ 
draw line(x,y,obj player.x,obj player.y); 


hidding=true; 


else 


hidding=false; 
} 
Draw Event: 
draw_self(); 


if hidding { draw_text(x,y,"Hidden"); | 


else 
{ 
draw_text(x,y,"Can See"); 


draw line(x,y,obj player.x,obj player.y);//shows 
line - great for testing 


) 
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3 Simple Level Complete Save System 


To load saved data: 


ini open("Settings/savedata.ini"); 


levell = ini read real("savel", "done", false); 
level2 = ini read real("save2", "done", false); 
level = ini read real("save3", "done", false); 
level4 = ini read real("save4", "done", false); 
level5 = ini read real("save5", "done", false); 
1еуе16 = ini read real("save6", "done", false); 
Level] = ini read real("save7", "done", false); 
level8 = ini read real("save8", "done", false); 


ini Close () 

To save data, where global.level is the level that has 
been completed: 
ini_open("Settings/savedata.ini"); 


ini write real ("save"+string(global.level), 
"done", true); 


ini close(); 
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4 Seeking Missile 
This creates a missile that seeks out an enemy instance. 


Create Event: 


target = instance nearest(x, y, obj enemy); 
Speed-5; 
а1агт [0] =дате get speed(gamespeed fps) *8; 


Alarm 0 Event: 


instance destroy(); 


Step Event: 


if instance exists (target) 


{ 


diff = angle difference (point direction(x, y, 
target.x, target.y), direction); 


direction += sign(diff) * min (abs (diff), 4); 
} 
image angle=direction; 
Collision Event with obj enemy 
with other instance destroy(); 


instance destroy(); 
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5 Draw Health As Bars 


Draw Event: 


var number of bars, healthbar, width, height, 
Xpos,ypos, gap; 


healthbar-health div 10;//change 10 to value you 
wish each bar to represent 


width-20;//width of each bar 
height-20;//height of each bar 


xpos-100;//change this to change draw location 


ypos-100;//change this to change draw location 
gap-5; 


for (number ot bars = 0; number of bars < 
healthbar; number of bars +=1;) 


{ 
draw_set_color(c red); 


draw rectangle (xpos+width*number of bars+ 
(number of bars*gap), O+ypos, 


xpos+width*number of bars+width+ 
(number of bars*gap), heightt+ 


ypos,false)//false fills the rectangle 
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6 Ellipse Movement 


This code will move in instance in an ellipse. 


Create Event: 
angle=0; 

rx-2560; 

ry-64; 

angle speed=0.05*pi; 


XC—-XSULart; 


yc-ystart; 


Step Event: 


x=xctrx*cos (angle); y-yc-ry*sin(angle); 
апотет=апа те speed; АТ (angle>2*pi) angle--2*p1; 
else if (апд1е<0) anglet=2*pi; 
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7 Draw Contents Of 2D Array 


A simple method to draw data from an array. Example 
Create Event code: 


Var 3,55; 


for (і = 0; i < 10; i++) 


Draw Event: 
cellsize=40; 
border=2; 


draw sec Golour'(o black); 


for (i= O;i < 10; i++) 


for (j= 0; у < 10; 34-4) 


xpos-i*cellsize; 


ypos-j*cellsize; 


draw rectangle (border+xpos, bordertypos, border+xpo 
stcellsize,bordert+ypost+cellsize,2); 


draw_text (border+xpost5, bordertypos+12,array[i] 
(21); 


1 
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8 Adaptable Engine Noise 


This code changes te pitch of an engine noise based on 
its speed. Requires an engine noise sound. 


Create Event: 
global.sound-audio play sound(engine,l,true); 
Step Event: 


play speed-spd/10; 


audio sound pitch(global.sound,play speed); 
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9 Drag-able Objects 


Sometimes you may wish the player to be able to click 
and an instance around the room. Here is a simple 
solution: 
Create Event: 
dragging=false; 
Step Event: 
if position meeting (mouse x,mouse y,id) 
{ 

if mouse check button pressed(mb left) 

{ 

dragging=true; 


offsetx=x-mouse x; 


offsety-y-mouse y; 
} 


if mouse check button released(mb left) 


{ 
dragging=false; 


1 


End Step Event: 
if dragging 


x=mouse xtoffsetx 


y=mouse_y+offsety 
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10 Mini Map 


This code draws a mini-map, 


Draw Event: 
var а,а,хх,уу; 


xx = obj player.x; 


yy = obj player.y; 
with(obj wall parent) 
{ 

а = point distance (xx,yy,x,y);: 


if(d <= 1000) { d = d/500*75; a = 
point direction (xx, yy, х,у) 


draw sprite(spr map, 0, view_xview[0]+75 4 
lengthdir x(d,a), view _yview[0]+75 + 
lengthdir y(d,a)); 


1 


1 
draw set -color(c blue); 


draw rectangle(view _xview[0]+75-2, 
view yview[0]-*75- 
2,view_xview[0]+75+2,view_yview[0]+75+2,0); 
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11 Trail Effect 


A simple script for drawing an image trail. 


Create Event: 
t = 0; 


speed = 10 + random(5); 
direction = -5 + random(10); 


Draw Event: 


t = min(t + 1, tm); 


for (i = t; i> 1; i -= 1) 
{ 
tx[i] = tx[i-1]; 
ty[i] = tyl[i-1]; 
ta[i] = ta[i-1]; 
Баа ваъ; 
} 
tx[1] = x; 
ty[1] = y; 
ta[1] = direction; 
ti[i] = image index; 
direction += direction; 


FOR. (р eek m Ss 289 Ab ру |0) 


draw sprite ext(sprite index,ti[i],tx[i],ty[i],im 
age xscale,image yscale,0,image Юр1епа, sqr (1-i/ 
t)); 


21 


12 Change Image On Mouse Interaction 


This example uses a sprite with 3 different 
subimages,0=no mouse, 1—mouse over and 2=mouse 
pressed. 
Step Event: 
if instance position(mouse x,mouse y,id) 
{ 

if (mouse check button(mb left) ) 

{ 


image index = 2; 
} 
else 
{ 
image index = 1; 
} 
} 
else 


image index=0; 
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13 Mouse Pointer Point Direction 


Draws a sprite as pointer, pointing direction of target 
and slowly moves. 


This example assumes sprite pointing right with origin 
as center. 


Step Event: 


move towards point (mouse x,mouse y,point distance 
(x,y,mouse x,mouse y)/12); 


Draw Event: 


window set cursor(cr none);//hides default 


draw sprite ext(sprite index,0,x,y,1,1,point dire 
ction 


(xprevious,yprevious,x,y),c white,1); 


//Note: use window set cursor(cr default); to 
allow drawing default cursor again. 
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14 Power Up 


A simple solution for managing a power up. 


Create Event: 


power up-false; 


Alarm 0 Event: 


power up-false; 


Step Event: 


if keyboard check(ord('P')) && power up-fals 


{ 


power up=true; 


alarm[0]-game get speed(gamespeed fps) *8; 
) 


Draw Event: 
if power up-true 
{ 
draw text(50,50,"POWER UP"); 


else 


draw text(50,50,"NO POWER UP"); 
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15 Push-able Block 
A simple pushing system 
obj player Step Event: 


if mouse check Dutcon(mb _left)x-=5; 


if mouse check button(mb right) x+=5; 


obj block Step Event: 


if place meeting(x+5,y,ob] player) (х--5) 


if place meeting (x-5,y,ob] player) {х+=5} 
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16 Radar 


A great adaptable radar system. 

This assumes you have: 

Object obj_ player with sprite assigned 
Object obj_ gem with sprite 

Sprite spr_radar_gem (6x6 pixels in red) 


obj_radar Create Event: 


Draw Event: 
//stop here if no player 
if (!instance_exists (Player 17 )) 
{ 
exit; 
} 
draw circle(250,250,240,true); 


draw circle(250,250,160,true); 


draw line(250,10,250,490); 


draw line(10,240,490,240); 
draw set colour(c green) 


var px-obj player.x; 


var py-obj player.y; 


with (obj gem) 
{ 


var dist-point distance (рх,ру, х,у) 
if dist<=2000 
{ 


dist=dist/2000*250; 


angle=point direction (рх,ру, х,у); 
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draw sprite(spr gem blip,0,250+lengthdir x(dist,a 
ngle), 250+lengthdir y(dist,angle)); 


) 
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17 Random Word From A Text File 


This example shows how to select a random word from 
a text file. Assumes a text file dictionary.txt is in 
included files. 
The script code is: 
function newWord() 
{ 

var file; 


LE (file_exists (working directory + 
"dictionary.txt")) { 


//open the dictionary file 


file = file text open read(working directory + 
"dictionary.txt"); 


if(file == -1){ 


[fif loading the file failed return -1 


return -1; //will end the script 
} 
var wordList, wordNumber = 0; 


//make a list containing all words of the 
dictionary 


while(!file text _eof(file)) { 


wordList [wordNumber] = 
file text read string(file); 


file text readln(file); 
wordNumber++; 


1 


file text close (file); 


return wordList[irandom(wordNumber-1)]; //return 
a random word 


) 
) 


You can call with word = newWord(); 
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18 Real Time Clock Example 


Draws the players local time according ro the system 
clock. 


Create Event: 


minute=0; second=0; hour=0; 


Step Event: 
hour-current hour; 


minute=current minute; 


second=current second; 
hours=string (hour); 


minutes=string (minute); 


seconds=string (second); 
seconds=string_repeat("0", 2- 

string_length (seconds) )+seconds; 
minutes=string_repeat("0", 2- 

string_length (minutes) )+minutes; 
hours=string_repeat("0", 2-string_length (hours)) 
+hours; 


Draw Event: 
draw set colour(c black); 


draw text (300,300, hourst+":"+minutest":"+seconds) ; 
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19 Score With Leading Zeros 


A simple method of drawing a score with leading 0;s 
Draw Event: 
str = string(score); 


draw text(x, y, string repeat("0", 6- 
string lengthí(stt))-4stt); 
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20 Fading Moving Text 


Creates moving fading text, great proving info to the 


player. 


Create Event: 


сех- 


[0] 


text [ 


text [ 


сех 


text [ 


text [ 


total 


1 
2 
[3] 
4 
5 


J="When It's Done"; 


="This Text Floats Up"; 
]-"And Fade Outs at Тор Of Screen"; 
J="Great For Providing Inoformation"; 


="Or Display Game Credits"; 


J="Program It To Do Something"; 


 lines-array length ld(text); 


i-room height; 


p=0; 
h=1; 


Draw Event: 


draw_set 
draw_set 
draw_set 
draw_se 


Va 


L color(c black)? 
t_halign(fa_center); 
lign(fa middle); 


t font(font text);///set your font here 


h-i/100; draw set alpha(h); 
draw text ext(room width/2,i,text[p],20,room widt 
h-20); 


if keyboard check (vk_enter) i-=5; else i-=2 


if 1<0 

{ 

i=(room height+(string_height (text[p])*2)); p+=1 
} 

draw set alpha(1); 

//if p»total lines then do something, go to 


room/restart for example 
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21 Cool Down System 


A useful idea that limits how often a player can shoot / 
attack / or perform other actions. 


Create Event: 


global.hitmeter=0; 


global.cooloff=false; 


Step Event: 


if mouse check button pressed(mb left) && 
global.cooloff-true 


{ 

audio play sound(snd_neg,1, false) 
exit; 

1 

//put your attack code here 


if mouse check button pressed(mb left) && 
global.cooloff-false 


{ 
global.hitmeter-t-25; 
) 
if global.hitmeter»100 && global.cooloff-false 
{ 


global.cooloff=true; 


global.hitmeter=100; 


if global.cooloff 
{ 


if global.hitmeter<l 
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global.hitmeter=0; 


global.cooloff=false; 


} 
global.hitmeter--0.2; 


if global.hitmeter»100 global.hitmeter-100; 


if global.hitmeter«O0 global.hitmeter=0; 


Draw Event: 

draw ‘self () 

уу=500; 
draw Seu .Color(c orange) 
draw_rectangle (100, yy-300, 800, yy-200, false); 
draw set color (c yellow) 


draw_rectangle (100, yy-300,100+ 
((700/100) *global.hitmeter),yy-200,false) ; 


draw set colour(c black); 


draw rectangle (100, yy-300, room_width-100, yy- 
200,true); 


draw set halign(fa center); 


draw set valign(fa middle); 


draw set font(font arcade); 
if global.cooloff-false 
{ 


draw text (room width/2-200,yy-250,"CAN ATTACK 
AND BLOCK") ; 


} 
if global.cooloff=true 
{ 


draw text (room width/2-200, yy- 
250, "RECHARGING" ) ; 


1 
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draw set colour(c white); 


draw text(100,100,global.hitmeter); 
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22 Sliding Bar 


A useful bit of code that allows a user to select a 
value.Assumes you have two sprite 64x64 in size, 
origin as center, spr bar in red and ѕрг slider in 
green. Sprite bar is assigned to the object below. When 
you place object obj slider in the room click on a 
corner and stretch out as needed 


Create Event: 


minValue-x- (sprite width/2); 


maxValue=x+ (sprite width/2); 


curValue=0.5; 


length=maxValue-minValue; 


isSliding=false; 
Step Event: 


if (mouse check button pressed(mb left) &&position_ 
meeting (mouse x,mouse y,self)) 


{ 
isSliding=true; 
1 
if (mouse check button released(mb left) ) 
{ 
isSliding=false; 
1 
if (18511410) 
{ 


curValue- (mouse x-minValue) /length; 


if (mouse x«minValue) 
{ 

curValue=0; 
} 


if (mouse x»maxValue) 
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curValue=1; 


1 


Draw Event: 
draw self(); 


draw sprite(spr slider,O0, (length*curValue) 
-minValue, у); 


draw .set-colour(c black); 


draw text(x,y-*10,string(curValue)); 
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23 Slowly Move 


This slowly moves to a position, in this example to the 


mouse’s position. 


Step Event: 


movement speed=25;//Higher Number Makes Slower 
Speed 

target x-mouse x;//or other target position 
target y-mouse y;//or other target position 

х +=( target x-x)/ movement speed; //target 
position-current position 

y +=( target y-y)/ movement speed; //target 
position-current position 
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24 Rising Smoke Effect 


Create a rising and fading smoke effect. Requires a 
sprite of a smoke. 

Create Event: 

тоў1оп_зе©(90,2); 

а1р=1; 

Step Event: 

alp-=0.02; 

if а1р<0 instance destroyt)r 

Draw Event: 


draw sprite ext(sprite index,0,x,y,1,1,0,c white, 
alp); 
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25 Typewriter Text Effect 


Draws text, one character at a time. 


Create Event: 

draw set colour(c black); 

draw text(x, y, typewriter out); 
Alarm 0 Event: 


typewriter outt+=string copy(text to write,i,1); 


it-1; 
if((i-1)!=string_length (text_to write)) 
alarm[0]=5; 


Draw Event: 
draw set colour(c black); 


draw text(x,y,typewriter out); 
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26 Level Unlock System 


The currently available levels is the value global.levels, 
ie a value of 2 would mean levels 1 and 2 unlocked. 
This needs to be declared before adding the following 
code, for example in a splash screen at the start of the 
game or at the end of completed level. This example 
uses a sprite with 2 subimages,’ image 0’ unlocked, 
‘image 17 locked, the sprite origin is the center. 


Just duplicate the objects as needed, changing the value 
of my_id to the level number, also change the code in 
the left button released event to go to the level you 
want. 

Create Event: 

my id-1; 

locked-true; 

subimage=1; 

image speed=0; 

///check if allowed 

if (Global. level <= my 10-1) 

{ 


locked=true; 


subimage=1; 


1 
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locked=false; 
subimage=0; 
} 
Left Button Pressed Event: 
///go to level(room) if unlocked if locked=false 
i room goto (room lével 1); } 
Draw Event: 


draw sprite(spr levels, subimage,x,y); 
draw set halign(fa center); 
draw text(x,y,string(my id)); 
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27 Weapon Management 


An example for storing info for multiple weapons. This 
example assumes you have the required graphics and 
sound effect refenced in the code below. 


Create Event: 


weapon no-1;//handgun 


global.weapon info[weapon 
Gun";//Weapon Name 
global.weapon info[weapon 
Number 

global.weapon info[weapon 
global.weapon info[weapon 
global.weapon info[weapon 
global.weapon info[weapon 
global.weapon info[weapon 
Sight for Weapon 
global.weapon info[weapon 
n;//Damage Area for Weapon 
global.weapon info[weapon 
Sound When Firing 
global.weapon info[weapon 
n selected;//snd of voice 
global.weapon info[weapon 
size 


weapon no-2;//rifle 


global.weapon info 
Name 

global.weapon info 
Number 
global.weapon info 
global.weapon info 
global.weapon info 
global.weapon info 


[weapon | 


[weapon _ 


[weapon _ 
[weapon _ 


[weapon _ 


[weapon _ 


n 


n 


о, 1]="Напа 
o,2]=100;//Starting 
0, 3]=1;//Strength 
o,4]=1;//Reload Speed 
o,5]-21;//Cost 
o,6]=5;//Aiming Speed 
o,7]-spr handgun;//Gun 
о,81-0р) damage handgu 
o,9])=snd_handgun; // 
о,10]=ѕпа voice handgu 


weapon selected 


o,11]-20//ammo pack 
o,1]-"Rifle";//Weapon 
o,2]225;//Starting 
o,3]22;//Strength 
o,4]-2;//Reload Speed 
o, 5]=2;//Cost 
o,6]=3;//Aiming Speed 
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lobal.weapon_info[weapon_no,7]=spr_rifle;//Gun 
ight for Weapon 


ож 


lobal.weapon info[weapon no,8]-obj damage rifle; 
/Damage Area for Weapon 


hen Firing 


g 
/ 
global.weapon info[weapon по, 9] =зпа rifle;//Sound 
W 
g 


lobal.weapon info[weapon no,10]-snd voice rifle | 
selected;//snd of voice weapon selected 


global.weapon info[weapon no,11]-15//ammo pack 


global.weapon=1; 


score=100; 


Step Event: 


if (keyboard check released(ord("1"))) 


{ 
global.weapon=1; 


audio play sound(global.weapon info[global.weapon 
,101,1,0); 


} 
if (keyboard. check released (ord ("2") ).) 


{ 
global.weapon=2; 


audio play sound(global.weapon info[global.weapon 
,101,1,0); 


1 


if mouse check button pressed(mb left) 
{ 


if (score>=global.weapon_info[global.weapon, 5]) 


{ 


//take money off score 
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score=score- 
global.weapon_info[global.weapon, 5]; 


//increase ammo no by one 


global.weapon info[global.weapon,2]-global.weapon 
 info[global.weapon,2]-*1; 


//play sound purchase complete 


audio play sound(snd voice purchase complete,1,0) 


else 


//play not enough cash 


audio play sound(snd voice not enough cash,1,0); 
) 

) 

if mouse check button pressed(mb right) 

{ 
if (global.weapon_info[global.weapon,2]>0 ) 
{ 


audio play sound(global.weapon info[global.weapon 
,91,1,0); 


global.weapon info[global.weapon,2]--1; 


instance create layer 
(mouse x,mouse y,"Instances",global.weapon info[g 
lobal.weapon,8]) 


else 
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audio play sound(snd voice no ammo,1,0); 


) 
) 


Draw Event: 


draw sprite(global.weapon info[global.weapon,7],0 


,х,У) 


. 
М 


draw set colour(c white); 


с (22 


t (35 


с (45 


t (59 


draw tex 
!11)7 
draw_tex 
draw tex 
п,2]); 
draw tex 
draw tex 
п,3]); 
draw tex 


t (10 


, 360 
, 360 


, 360 
, 360 


‚100 


^ 


V 


^ 


V 


^ 


t(25,360,global.weapon info[global.weapon 


,"Ammo:"); 


;global.weapon info[global.weapo 


,"Damage:"); 


,global.weapon info[global.weapo 


,"Cash "+string(score)); 
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28 Top Down Character Control 
HI 
T? gv 
ТЕ? 


4 direction movement and sprite contol. 
Create Event: 


sprite index-spr down; 


Step Event: 
if (keyboard check(ord("W"))) 
{ 
sprite index=spr up; 
image speed=1; 
у-=2; 
} 
else if (keyboard сһеск(ога("5"))) 
{ 
sprite index-spr down; 
image speed=1; 


yt=2; 


else 


if (keyboard check(ord("A"))) 
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sprite index=spr left; 
image speed=1; 
х-=2; 
} 
else 
if (keyboard check(ord("D"))) 
{ 
sprite index-spr right; 
image speed=1; 


хі-2; 


else 


image speed=0; 
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29 Blood Effect Using Particles 


Creates a blood effect using particles. 


Create Event: 


global.particle system = part system create(); 


part system depth(global.particle system, 0); 


// Create the 


global.particl 


particle type 


e_type = part -Lype create)? 


part_type_shape (global.particle_type, 


pt Shape. circ 


le); 


part type s128(global.perticle үре, 0.1, 0.5, 


0/22, 2022 


part type scale(global.particle type, 1, 1); 


part type orientation(global.particle type, 0, 


360, 0, 0,0); 


part type colorl(global.particle type, c red); 


part type alpha3(global.particle type, 1, 0.5, 


part type speed(global.particle type, 2, 4, -0.1, 


part type direction(global.particle type, 0, 360, 


0, 0); 


part type life(global.particle type, 20, 40); 


part type blend(global.particle type, true); 
Global Left Mouse Button Pressed Event: 


number of particles-40 


part particles create(global.particle system, 
mouse x, mouse y, global.particle type, 
number of particles); 


Clean Up Event: 


part system destroy(global.particle system); 
part type destroy(global.particle type); 
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30 Draw Text Info With Background 


A Simple script that can be used to draw info text for 


the player (assumes a room/view size of 1920 by 
1080). 


function scr tip (message) { 
draw set alpha(0.5) 
draw set colour(c white); 


draw roundrect(500,200,1420,400,false); 


draw set font(font hud); 


draw set valign(fa middle); 


+. 


draw set halign (fa. center); 


draw set colour(c white); 


draw text(960,302,message) 


draw text(960,298,message) 


draw text(962,302,message) 


draw text(958,298,message) 
draw set colour(c black); 
draw text(960,300,message) 
draw set alpha(l) 

) 

Example usage: 


Create Event: 
alarm[0]-game дес speed(gamespeed fps)*3; 


Draw GUI Event: 


message="Some Example Text\nTo Draw"; 


scr tip(message) ; 


Alarm 0 Event: 


instance destroy(); 
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31 Speed Boost 


A simple system to allow a temporary increase of an 
instance’s max speed. 


Create Event: 
global.boost=false; 

current speed-4; 

Collision with Powerup instance: 


global.boost-true; 


ататго Т=баме get speed. (gamespecd tps) 102 


with other instance destroy(); 


An example for the Step Event, adapt as needed: 
if !global.boost 
{ 


move towards point (mouse x,mouse y,current speed) 


else 


move towards point (mouse x,mouse y,current speed* 
2); 


} 


Alarm 0 Event: 
global.boost=false; 
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32 Projectile Curved Path 


Makes a projectile follow a curved path to target. This 
example ‘launches’ from bottom right, you can adapt 
as needed. 

Create Event: 

throws path=path_add(); 


path set kind(throws path, 1); 


path set closed(throws path, false); 


if target x«room width/2 
path add point(throws path, room width, 
room height, 50); 


else path add point(throws path, 0, room height, 
20); 


path add point(throws path, 600, 60, 50); 


path add point(throws path, target x, target y, 
20); 


path start(throws path, 50, 
path action stop, true); 


Path End Event: 


//Add your code here to do something at path end 


path delete(throws path); 


instance destroy(); 
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33 Draw Power Bar With Image 
Background 


A useful approach that draws power, health, boost 
etc,using an image as the background. 


Very adaptable. Example below: 


Create Event: 


player power=1; 


player max power=20; 
Example Step Event: 
if mouse check button(mb left) 
{ 
player power-=0.1; 
} 
if mouse check button(mb right) 
{ 
player powert=0.1; 
} 


if player ромег«0 player power=0; 


if player power»player max power 
player power-player max power; 
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Draw Event: 

draw self(); 

draw set color(c lime) 

draw text(100,100,player power); 


section size-sprite width/20; 


draw set colour(c white); 
xXx-xtsprite width; 

уу-у; 

height=sprite height; 


draw rectangle (xx, yy, XX- 
(section size* (player шах power- 
player power)),yy+theight, false); 


draw set colour(c black); 


draw rectangle (x,y,xx,y-*height,true); 
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34 Create Muzzle Flash 


This example shows how to create a muzzle flash for a 
rotating weapon. This system also rotates the muzzle 
flash with the weapon so it looks more realistic. 


Weapon Object obj_ player: 


Create Event: 
alarm[0]-game get speed(gamespeed fps) *5; 


ang-0; 


Step Event: 
if mouse check button(mb left) 


angtt; 


ang--; 


image angle-ang; 


Alarm 0 Event: 
alarm[0]-game get speed(gamespeed fps) *5; 


instance create layer(x,y,"fx",obj shoot); 
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Object obj shoot: 
Step Event: 


x-obj player.x+tlengthdir x(100,0bj player.ang); 


y-obj player.ytlengthdir y(100,0bj player.ang); 
image angle-obj player.ang; 
Animation End Event: 


instance destroy(); 
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35 Cloud Effect Using Filters & Effects 


This example make use of the powerful filters and 
effects layer. An example set up is shown below: 


Effect Layer 


* 


+ 
> Effect_1 


Open Editor 
4 Properties 


Depth = & 


4 Filters & Effects 


Effect Type: Clouds 


Scale 
Velocity 
Turbulence 
Cloud Level 


Wave Amount 


Shape 


Density 
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36 Missile Smoke Trail 


A simple method using built in effects system to create 
smoke trail effect. 


Example usage assumes sprite origin as middle center. 


Step Event: 
move towards point (mouse x,mouse y,4) 


dir=point direction(x,y,mouse x,mouse y); 


if direction<dir direction+=0.01; 


if direction>dir direction-=0.01; 


image angle=direction; 


size=sprite width/2; 


xx=x-lengthdir x(size,direction) ; 


yy=y-lengthdir y(Bize,drreocrion); 


effect create above(ef smoke,xx,yy,4,c blue); 
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37 Selectable Stats 


This allows the player to choose a player object with 
various stats. This example for a driving game, but 
easily change if for other game styles. 

Create Event: 

alarm[0]-game. get speed(gamespeed fps) *3,; 


global.current=1; 


tyres sprite-[noone,face 1,face 2,face 3,face 4,f 
ace 9; face 6; tace" P races 8, Pace. wp 


tyres_name=["","Blue 
Flash", "Neon", "Fast", "Turning 
Speed", "Attack", "Accelerate", "Тор Speed", "Good 


Allround","Easy Control"]; 


tyres. accelerate-[0,06,7,4,5,9,10,0, T7, T]; 


tyres topspeed=[0,7,5,10,8,6,7,10,7,5]; 
tyres attack-[0,6,7,3,6,10,5,4,7,5]; 


tyres turning-[0,6,4,5,10,3,4,4,7,10]; 


Alarm 0 Event: 
а1агт [0] =дате get speed(gamespeed fps)*3; 


global.current-t-; 


if global.current-10 global.current-1; 


Draw Event: 
draw set colour(c white); 


draw sprite ext(spr faces,global.current,400,740, 
5,5,0,c white,1); 


ЖА 
draw sprite ext(spr_bikes,global.current, 400,900, 


3,3,0,с white,1); 


draw set font (font arcade); 


draw set halign(fa center); 


draw text(400,700,tyres name[global.current]); 


draw text(room width/2,150,"Choose Your 
Character"); 
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draw tex 


Select"); 


С (room width/2,2,"Tap Left Button To 


, 


draw tex 
"+string 


draw set 


draw_set 


С (400,600,"Option 
(global.current)+" / 9"); 


_valign(fa_middle); 


 halign(fa right); 


xx-room width/3*2; 


yy-700 
draw tex 
for (var 


{ 


t (xx, yy, "Acceleration: "); 


і = 0; i < 10; i += 1) 


valge-tyres accelerate | global. current, 


draw S 
draw r 
draw S 


draw r 
40,хх+ (5 


draw 5 
draw r 
draw 1 
draw 1 
draw 1 
draw 1 
draw 1 
draw 1 
draw 1 


draw 1 


draw 1 
} 
//topspe 
yy-800 


draw tex 


et Color (ered) 7 
ectangle (xx, уу-40, xx+500, yy+40, false); 
GU Color (ә - green); 


ectangle (xx, yy- 
00/10*value),yy-*40,false); 


et color(c white); 


ectangle (xx, yy-40, xx+ (500), yy+40, true) ; 


ine (хх+ (50), yy-40, xx+ (50), yy*40) ; 
ine (xx+(100),yy-40,xx+(100),yyt40); 


ine (хх+ (150), уу-40,хх+ (150), уу+40); 
ine (хх+ (200), уу-40,хх+ (200), уу+40); 
ine (хх+ (250), уу-40,хх+ (250), уу+40); 
ine (хх+ (300) , уу-40,хх+ (300), уу+40); 
ine (хх+ (350), уу-40,хх+ (350), уу+40); 
ine (хх+ (400), уу-40,хх+ (400), yy+40) ; 


ine (хх+ (450), уу-40,хх+ (450), уу+40); 


еа 


Е (хх, уу, "Тор Speed: "); 
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for (var і = 0; 1 < 10; 1 += 1) 
{ 


value-tyres topspeed[global.current] 


draw set color(c red); 
draw rectangle (xx, уу-40, хх+500,уу+40, false); 
draw set color(c green); 


draw rectangle (xx, yy- 
40,xx+(500/10*value),yy+40, false); 


draw set color(c white); 


draw rectangle (хх, уу-40,хх+ (500), уу+40, true); 


draw 1іпе (хх+ (50), уу-40,хх+ (50), уу+40); 
draw 1іпе (хх+ (100), уу-40,хх+ (100), уу+40); 


draw 1іпе (хх+ (150), yy-40, xx+ (150), уу+40); 
draw 1іпе (хх+ (200), уу-40,хх+ (200), уу+40); 
draw 1іпе (хх+ (250) ,уу-40,хх+ (250), уу+40); 
draw 1іпе (хх+ (300), уу-40,хх+ (300), уу+40); 
draw 1іпе (хх+ (350), yy-40, xx+ (350), уу+40); 
draw 1іпе (хх+ (400), уу-40,хх+ (400), уу+40); 


draw 1іпе (хх+ (450), yy-40, xx+ (450), уу+40); 
) 
//attack 
yy-900 


draw text (xx,yy,"Attack: "); 


for (var і = 0; i < 10; i += 1) 
{ 
Value-Lyres. attack [globalwcurrent] 
draw Set со1ог(с гей); 
draw rectangle (xx, уу-40, хх+500,уу+40, false); 
draw “seu color(G green); 


draw_rectangle (xx, yy- 
40,xx+(500/10*value) ,yy+40, false); 


draw set color(c white); 
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draw rectangle (xx, уу-40,хх+ (500), yy+40, true) ; 


draw line (хх+ (50), уу-40,хх+ (50), уу+40); 
draw 1іпе (хх+ (100), уу-40,хх+ (100), уу+40); 


draw 1іпе (хх+ (150), уу-40,хх+ (150), уу+40); 
draw 1іпе (хх+ (200), уу-40,хх+ (200), уу+40); 
draw 1іпе (хх+ (250) ,уу-40,хх+ (250), уу+40); 
draw 1іпе (хх+ (300), уу-40,хх+ (300), уу+40); 
draw 1іпе (хх+ (350), уу-40,хх+ (350), уу+40); 
draw 1іпе (хх+ (400), уу-40,хх+ (400), yy+40) ; 


draw 1іпе (хх+ (450), уу-40,хх+ (450), уу+40); 
} 
//turning 
yy-1000 
draw text(xx,yy," Turning: "); 
for (var і = 0; i < 10; i += 1) 
{ 


value-tyres turning[global.current] 


draw set oolor(o red); 
draw rectangle (xx, yy-40,xx+500, yy+40, false); 
draw set oolor(c green); 


draw rectangle (xx, yy- 
40,xx+(500/10*value) ,yy+40,false) ; 


draw set color(c white); 


draw rectangle (xx, уу-40,хх+ (500), yy+40, true); 


draw line (хх+ (50), уу-40,хх+ (50), уу+40); 
draw 1іпе (хх+ (100), уу-40,хх+ (100), уу+40); 


draw 1іпе (хх+ (150) ,уу-40,хх+ (150), уу+40); 
draw 1іпе (хх+ (200), уу-40,хх+ (200), уу+40); 
draw 1іпе (хх+ (250), уу-40,хх+ (250), уу+40); 
draw 1іпе (хх+ (300), уу-40,хх+ (300), уу+40); 


draw 1іпе (хх+ (350), уу-40,хх+ (350), уу+40); 
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акам 1іпе (хх+ (400), уу-40,хх+ (400), yy+40); 


draw 1іпе (хх+ (450), уу-40,хх+ (450), уу+40); 


And finally а Step Event that stores the selected stats 
in global variables so they can be used in game: 


if mouse check button pressed(mb left) 


{ 


global.tyres sprite-tyres sprite[global.current]; 


global.name-tyres name[global.current]; 


global.acceleration-tyres accelerate[global.curre 


nt]; 


obal.topspeed-tyreés topspeed[global.current]; 


obal.turning-tyres turning[global.current]; 


ai 
global.attack-tyreés attack[global.current]; 
2 
41 


obal.bike sprite=global.current; 


room goto(room game); 


63 


38 Add Playing Cards & Shuffle 


A simple method to shuffle a deck of playing cards. 
Create Event: 

x-room width/2-(sprite width/2); 

y-500 


deck-ds list create(); 


ds list add(deck,s 1,5 2,5 3,5 4,5 5,5 6,5 7,5 
5 9,5 10,s 11,5-12,8 13); 


ds list add(deck, d: 24 -39G» 458 294.07 кел ке 


@- 95.6. TOP LE. 


x Ж 1,4 2,4 3,4 4,4 5,4 6,4 7,4 


“хо Nas 
ds list add(deck, 


ds list add(deck, 


1,h 2,h 3,h 4,h 5,h 6,h 7,h 


с 
2 
а 
d 9а Лоа 117a 1270 13); 
h 
2 


h 9,h 10,h 11,h 12,h 13); 


ds 1180 shuffle(deck); 


previous-ds list create(); 

//deal card 

card=deck[|0]; 

ds list delete (deck, 0); 

sprite index=card; 

//current 

name = sprite get name (card) 

var path parts = string split(name, " "); 
value-real( path parts[l]); 

suit=string( psth parts[0]); 
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Draw Event: 


draw set halign(fa center); 


tis-"Spades"; 


tis-"Diamonds"; 


ueis=string (value) ; 


if suit="s" sui 

if suit="h" suitis="Hearts"; 
if suit="d" sui 

if suit="c" suitis="Clubs"; 
if value«11 val 

if value-11 valueis="Jack"; 
if value-12 valueis-"Queen"; 
if value-13 valueis-"King"; 
if value-1 valueis="Ace"; 


draw text(200,100,valueis-*" Of "+suitis) 


draw sprite(sprite index,0,x,y) 
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39 Enemy Track Player’s Movement 


Sometimes you may want an enemy to match the 
player’s movement. This example moves the enemy’s 
y position towards the player. 


Step Event: 
if obj player.y<y 


66 


40 Tool Tip Pop Up 


Some Useful 
Info Here 


A useful bit of code that provides extra info to the 
player on mouse over. 


Draw Event: 


draw_self(); 


inst=instance position (mouse x,mouse y,id) 


if inst!=noone 


{ 


xx-inst.x; 


yy-inst.y-(sprite height/2); 


draw sprite(spr bubble,0,xx,yy): 


_font (font_text); 


lign (fa_center); 


draw set colour(c green); 
draw set 

draw set ha 

draw set va 


lign(fa middle); 


draw text(xx-80,yy-100,"Some Useful\nInfo 


Here"); 


) 
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ALSO AVAILABLE AS A 
PAPERBACK 
АМО 
KINOLE ВООК 
ON AMAZON 


GAMEMAKERBOOK.COM 


41 Pop Up Wobbly Text 


A simple text effect, great for using when a player 
collects a coin, showing the score the player gets. 
Create Event: 

size=0.2; 

fade size-5;//size to reach before fading 
fade speed-0.01;//how quickly to fade 
angle=0; 

sw=2;//for sine wave 

fading=false; 

alpha=1; 


Step Event: 

size+=0.1;//increase size 
y-=0.3;//move up 

swt=0.2; 

angle-sin(sw)*5;//for wave effect 


if size»fade size and fading--false//allowq 
fading 


{ 


alpha-=fade_speed; 


if alpha«0 instance destroy(); 
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Draw Event: 


draw set fon 


t (fon 


E float); 


If text<0 draw set color(c red); else 


draw set color(c blue); 


draw set halign(fa center); 


draw set valign(fa bottom); 


draw set alpha (alpha); 


draw text transformed(x,y,text,size,size,angle); 


draw set alpha(1);//set back so noting else 


affected 


You can call with: 


textmake-ins 
y text); 


textmake.tex! 


L-"You message her 


tance create layer(x,y,"hud",obj funk 


”. 
Ё 
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42 Grow and Shrink Message Control 


This example grows and shrinks an image. Great for 
giving info to the player. Assumes image origin is 
middle center. 

Create Event: 

scale=0; 

dir-"up"; 

x-room width/2; 

y-room height/2; 

Sprite index-spr collect; 


image xscale-scale; 


image yscale-scale; 
Step Event: 
if dir-"up" scale+=0.03; 
if dir-"up" and scale»1 
{ 

dir="wait"; 


alarm[0]-game get speed(gamespeed fps); 


} 
if dir="down" scale-=0.03; 
if dir="down" and scale<0 
{ 

instance destroy(); 
} 


image xscale=scale; 


image yscale=scale; 


Alarm 0 Event: 


dir="down"; 
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43 Smoothly Move To Mouse Position 


This moves smoothly to a position, in this example the 
mouse’s position. 


Create Event: 


E 


follow speed-0.1; 


target x-x; 


target y-y; 


Step Event: 


Larget x-mouse x; 


target y-mouse y; 


xt= (target x-x)*follow speed; 


yt-(target y-y)*follow speed; 
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44 Bounce Off Room Border 


A simple effect, great for sprucing up a menu or pause 
screen. 

Create Event: 

speed=5; 


direction=irandom (360); 


Step Event: 

if(x«-0||x»-room width) 

{ 
direction=180-directiont+tirandom range (-10,10); 
) 

if(y«-0||y»-room height) 

{ 

direction=360-directiontirandom range(-10,10); 
) 


direction=(direction+360)mod 360; 


73 


45 Pause Music When Sound Effect 
Plays 


This little method pauses the background music whilst 
an audio effect plays, great for adding atmosphere to 
your games. 

Create Event: 
music-audio play sound(snd music,l,true); 


paused-false; 


Step Event: 


if mouse check button pressed(mb left) && 
paused--false 


{ 


audio pause sound (music); 


explosion-audio play sound(snd explosion,l1,false) 


paused-true; 
) 
if paused--true 


{ 


if !audio_is playing (explosion) 
{ 
paused=false; 


audio resume sound (music); 
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46 Glitch Effect Text 


Creates a shaking text effect. 


Create Event: 
text to display = "Glitch Effect Exemple"; 


Draw Event: 


var x offset = irandom range(-2, 2); 
var y offset = irandom range(-2, 2); 
var color offset - irandom range(-5, 5); 


draw set font(ifont гехг)у 


draw _set_color(c_ blue + color offset); 


draw ехо + x offset, y y _ offset, 
text_to display); 
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47 Wobbly Text 


This makes a cool text floating wobble effect. 


Create Event: 
text="Wobbly Text"; 


wave amplitude-45; 


wave frequency-0.2; 
wave speed-0.2; 


wave timer-0; 


Step Event: 


wave timer--wave speed; 


Draw Event: 


саваў set ront(tont _ text); 


draw set colour(c white); 


varlen-string length(text); 
for (уагі=0;1<1еп;і++) 
{ 


varchar-string char аС(їехї,1+1); 


varchar x=x+i*40;// 
Adjustthehorizontalspacingasneeded 


varchar y-ytwave amplitude*sin(wave frequency* (i+ 
wave timer) ); 


draw text(char x,char y,char); 
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48 Choose A Random Instance 


This code chooses a random enemy instance. 


Create Event: 


global.target=noone; 


Step Event: 


if global.target=noone && 
instance exists(obj enemy) 


{ 


var inst = 
instance find(obj enemy, irandom(instance number (о 
bj enemy) - 1)); 


global.target-inst; 

state-"found target"; 
) 
You could then do something, such as moving towards 
the target: 


if instance exists(global.target) && 
distance to point(global.target.x,global.target.y 
)»10 


{ 


move towards point (global.target.x,global.target. 
у,3) 


} 


Set global.target tO noone when done. 
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49 Draw Mini Healthbar For Enemy 


This is a simple method to draw a mini healthbar above 
an enemy instance. Assume sprite origin as middle 
center. 

For example, in the Create Event: 

maxhl=5; 

hl=maxhl; 


Draw Event: 


draw self(); 


parts-(100/maxhl)*hl; 


sw=sprite width/2; 


sh-sprite height/2; 


draw healthbar (x-sw, y-sh-10,x+sw, y- 
sh; parts, c.black,c red,c green, 0,true, true) ; 
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50 Fade In And Out 


This fades a sprite in and out. Useful for a lot of 
applications. 

Create Event: 

alpha=0; 

fade. speed-0.01; 

fading in=true; 

Step Event: 

if (fading in) 

{ 


alphat-fade speed; 
if (alpha»-1) 
{ 

alpha=1; 


fading in=false; 


else 


alpha-=fade_speed; 
ifalpha<=0) 
{ 

alpha=0; 


fading in=true; 


1 


Draw Event: 


draw sprite ext(sprite index,0,500,500,1,1,0,c wh 
ite,alpha); 
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51 Rotating Text 


A Simple method for rotating text. 


Create Event: 


rotation speed=1; 


rotation angle-0; 


Lext Lo rotaLte-"Hello; World!"; 


сехс х-х; 


text y-y; 


draw set font(font text); 


width-string width(text to rotate); 


Step Event: 

rotation angle-4-rotation speed; 

хх-їех х (-lengthdir x(width/2,rotation angle) ) 
yy-text yt(-lengthdir y(width/2,rotation angle) ) 
text х-х; 

text y-y; 


Draw Event: 


draw set font(font text); 


draw set color(c white); 


draw text transformed(xx,yy,text to rotate,1,1,ro 
tation angle); 
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52 Flashing Text 


You can use this method to make text flash and glow, 
ideal for getting the attention of the player. 
Draw Event: 


color-make colour rgb(256,current time mod 
256, random(256) ); 


draw_set_color(color); 


draw set font(font text); 


draw text(x, y, "Your Text Here"); 
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53 Play Sound At Selected Volume 


Sometimes you may wish to play a sound at a lower or 
higher volume. 


Here is a simple example. 


Step Event: 
if mouse check button(mb left) 
{ 
//play 20& volume 
audio play sound(snd_explosion,1,0,0.2); 
} 
if mouse check button(mb right) 
{ 
//play 100% volume 


audio play sound(snd explosion,1,0,1); 
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54 Spawn Powerups Control System 


An example system for providing the player with a 
bonus. Works on a percentage system, each with a 
chance of happening. 

Create Event: 

result=""; 


value=0; 


Step Event: 


if mouse check button pressed(mb left) //replace 
with your bonus trigger 


{ 
var chance = floor (irandom(99)); 
if(_chance == 0) 
{ 
result="Extra Life"; 


//Your add life code 
else if(_chance < 15) 


result="Score Boost"; 


//Xour add score code 
else if(_chance < 40) 


result="Weapon Upgrade"; 


//Your weapon upgrade 
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else 


result="nothing"; 


//do nothing 
} 


value= chance;//for testing 
) 


Draw Event: 
100,100,result); 


~ 


draw text 


100,200,value) ; 


~ 


draw text 
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55 Move Crosshair To Mouse Position 


At time you want a player crosshair to move towards 
the mouse’s position. 


Here is a simple solution, Step Event: 


Largetx-mouse Xx; 


targety-mouse y; 


move speed-4; 


if distance to point(targetx,targety)^»move speed 


move towards point(targetx,targety,move speed) 
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56 Checkpoint System 


Sometimes you want the player to save it’s position at 
a level checkpoint. 


This can be done with: 


Create Event: 


checkpoint хэх, 


checkpoint_y=y; 


Collision with check point instance: 


checkpoint x-x; 


checkpoint y-y; 


To return to checkpoint when health has run out: 


x-checkpoint x; 


y-checkpoint y; 
lives--; 


health=100; 
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57 Check If Instance Is In View 


Sometimes you may want to check if an instance is in 
view, for example only allowing an enemy to shoot it’s 
projectile when within the current view. 


function scr inview(xpos, ypos) 


{ 


var cam = view camera[0]; 

var xl = camera get view x(cam); 

var yl = camera get view y(cam); 

var x2 = xl camera get view width(cam); 
var y2 = yl camera get view height(cam); 


if( point in rectangle( xpos, ypos, xl, yl, x2, 
y2)) return true; 


else return false; 
} 
} 


Which you call with: 
is in view-scr іпуіем (х,у); 


Which will return true or false 
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58 Jump Through Platforms 


Sometimes you may want to allow a player to be able 
to jump through a platform. This is one approach. 
Create Event: 

jump speed-45; 

gravity-1; 

hsp=8; 

Step Event: 

if mouse check button(mb left) 


{ 


x-x-hsp; image xscale-- 
else 


x-x-hsp; image xscale-1 
) 
if vspeed >= 0 


{ 


+ 


var platform = instance place(x, y + 
vspeed, obj block parent); 


+ 


if (o platform != noone) 


{ 


if (bbox bottom <= 
_platform.bbox_ top) 


{ 
//do nothing 


lse{vspeed=-jump speed; }}} 
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59 Play Random Level Music 


There may be time when you want to randomise 
background music for a level. The following is a 
simple method. 


Create Event: 

audio stop all(); 

global.music-audio play sound( choose(snd music 1 
,snd music 2,snd music 3,snd music 4),1,true); 
Storing the music track as a global variable allows you 
perform things on it whilst the game is playing. For 
example, to pause / resume the music. 
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60 Exploding Effect 
л? 


а 


2 


If your sprite assets have several parts available here is 
a simple effect. 
For example in a Step Event: 
if mouse check button pressed (mb left) 
{ 
parts=sprite get number(spr parts) ; 
for (var i= 0; i < parts; i += 1) 


{ 


inst-instance create layer(x,y,"explosions",obj e 
xplode); 


inst.sprite index-spr parts; 
inst.image speed-0; 
inst.image index-i; 


inst.direction=(360/parts) *i; 


inst.speed=4; 


1 


You may wish to destroy obj explode when outside 
room. 
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AILABLE TO ORDER 


GAMEMAKERBOOK.COM 


61 Draw Text With Border 


HELLO WORLD 


Here is a simple script that draws text with a border. 
Great for sprucing up your GUI text. 

function draw txt border (xx, yy, text,coll,col2) 
{ 


draw set colour(coll); 


draw text(xx-1,yy-1,text); 


draw text(xx-l,yyrl,text); 


draw text(xx4l,yy*l,text); 


draw text(xx*1l,yy-1,text); 


draw set colour(ocol2); 
draw text (xx,yy,text);; 
} 


Which you can call from a Draw Event with: 


draw txt border(100,100, "Hello 
World",c black,c red); 
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62 Move Coin To Score Text 


This creates a coin moving effect that moves it towards 
the HUD text for displaying score. This example 
assumes the HUD text is in the bottom right on GUI 
layer. 


Create Event: 


alp=1; 

Step Event: 

alp-alp-0.01; 

if alp«0.2 

{ 
alp=0.2 
var cam = view camera[0]; 
var xl = camera get view x(cam); 
var yl = camera get view y(cam); 
var x2 = xl + 1800 
var y2 = yl + 920 


move towards point (x2, y2,5) 
if distance to point (x2, y2)<20 
{ 


scoret=1; 
instance destroy () 


audio play sound(snd_coin,1,false); 
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Draw Event: 


var cam = view camera[0]; 
var xl = camera get view x(cam); 
var yl = camera get view y(cam); 


draw sprite ext(sprite index,image index,x-xl,y- 
yl,1,1,0,c white,alp); 
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63 Tire Track Effects 


Draws tyre tracks that fade away. Ideal for top down 
car or tank games. 


Spawning code for car or tank. 


Create Event: 
alarm[0]=5; 
Alarm 0 Event: 
alarm[0]=5; 


xx-x-(lengthdir x(120,image angle) ); 


yy-y-(lengthdir y(120,image angle) ); 


inst-instance create layer (xx,yy,"tracks",obj tra 
Cks); 


inst.image angle-image angle; 
show debug message("tracks") 
obj tracks Create Event: 
alp=1; 

Step Event: 

alp-=0.01; 

if аір<0 instance destroy(); 
Draw Event: 

draw set alpha (alp); 

draw self(); 


draw: set_alpha (1); 
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64 Fireworks Display 


A cool graphical effect, ideal for when a player 
completes a level. Just pop the following code in a 
Step Event: 


xx-irandom range(0,room width); 
yy-irandom range(0,room height); 
size-irandom(5); 


col-choose(c white,c yellow,c red,c orange,c purp 
le,c silver); 


effect create above(ef firework,xx,yy,size,col); 
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65 Spawn Bullets From Double Weapon 


This allows for spawning bullets in a double-barrelled 
weapon, like the image above. 


Shooting code: 
posx=xtlengthdir x(30,ang-90) 


posy=ytlengthdir y(30,ang-90) 


posxx=posxtlengthdir x(160,ang) 


posyy=posytlengthdir y(160,ang) 


+ 


inst=instance create layer (poszx, posyy, "bullets", 
tower bullet); 


inst.direction=ang; 


inst.image angle-ang; 


inst.speed=6; 


posx-xt*lengthdir x(30,ang+90) 


posy=ytlengthdir y(30,ang+90) 


posxx=posxtlengthdir x(160,ang) 


posyy=posytlengthdir y(160,ang) 


4- 


inst-instance create Тауек(ровхх,ровүу, "bullets", 
tower bullet); 


inst.direction=ang; 


inst.image angle=ang; 


inst.speed=6; 
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66 Sprite Drop Shadow 


A simple method for creating a drop shadow effect. 
Great for top down shooter games, such as those with 
helicopters or planes. 


Draw Event code: 


draw sprite ext(sprite index, 0,x-90,y- 
20,1,1,image angle,c black,0.4); 


draw self(); 
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67 Simple Top Down Collision 


This code works well in top down games, for example 
a racing game. Use this and it will bounce off 
instances. 


For example the following in a Collision Event with a 
rock: 


lengthdir x(2,point direction(other.x,other.y, 


) 


yt-lengthdir y(2,point direction(other.y,other.y, 


x 
< d 
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68 Spawn Instance With Random 
Subimage 
This example spawns an instance with a random 
subimage and vertical speed. 
Control Object: 


Create Event: 


alarm[0]=game_get_speed(gamespeed fps) *4; 


Alarm 0 Event: 
alarm[0]=game_ get speed(gamespeed fps) *4; 


inst-instance create layer (irandom range (128, room 
-міасһ-128);-200, “Instances”, ob] gem); 


obj_gem Create Event: 
image speed=0; 
image index-irandom(image number-1); 


vspeed-random range (1,4); 
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69 Sine Wave Based Movement 


A sine wave can be used for a lot of effects, for 
example smoothly moving an instance up and down, as 


in this example. 

Step Event: 

ypos=300;//where to anchor 
spd=1000;//move speed - smaller is faster 
dist=100;//distance to move 


y=ypostsin(current time/spd) *dist 
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70 Draw Player’s Speed On Dial 


A simple way to visually show the player’s speed. 


Create Event: 
spd=0; 
An example Step Event: 
if mouse check button (mb left) 
{ 
spd-=0.1; 
1 
if mouse check button(mb right) 
{ 
зра+=0.1; 
} 
spd=clamp(spd,0,7); 
Draw Event: 
draw set colour(c white); 


draw set halign(fa center); 
draw set valign(fa middle); 


draw set font(font dial); 
draw sprite(spr speed dial,0,600,420); 
ang-0-spd*30 


draw sprite ext(spr speed pin,0,600,420,1,1,ang-*l 
40,c_white,1); 


draw text (600, 600, abs (round (ang))); 
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71 Spawn Trees Border 


A simple method of spawning a border of trees, 
suitable for a top-down vertical scrolling shooter. 
Spawn code: 
size=80; 
xx=floor (room height/size) ; 
for (var і - 0; 1 < xx; i += 1) 
{ 
num=choose (1,2); 
if num=1 
{ 


instance create layer(100,i*size,"trees",obj plan 
t); 


instance create layer(room width- 
100,i*size,"trees",obj plant); 


if num-2 
{ 
instance create _ layer 100 „1965176, "trees", ob) plan 
t); 
instance create layer(220,i*size,"trees",obj plan 
t); 
instance create layer(room width- 


100,i*size,"trees",obj plant); 


instance create layer(room width- 


220,1*58126, '"rtrees' ОО plant). 


) 
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72 One Button Controlled Movement 


Allows you to add some accessibility to your games, 
by allow the player to move a crosshair around the 
room with a single button. 

Create Event: 


rotate:=0; 


Step Event: 


if mouse check button(mb left) or 
keyboard check(vk space) 


{ 


motion set (rotate, 5)? 
else 


rotatet=2.5; 
speed=0; 

} 

width=sprite width/2; 


height=sprite height/2 


x=Clamp (x, width, room width-width) ; 
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y=clamp (у, height, room_height-height) ; 


Draw Event: 
draw_self(); 


draw sprite ext(spr arrow,0,x,y,l,l,rotate,c whit 
ey lj 
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73 Plane Movement (Side Shooter) 


A flexible movement system for a player plane in a 
side-scrolling shooter. Assumes sprite origin as middle 
center. Create Event: 


ang=0 

speed=3; 

Step Event: 

if mouse check button(mb left) 


{ 


angtt; 


ang--; 


if ang>80 ang-80 

if ang«-80 ang--80 
image angle-ang; 
direction-ang; 

if y«100 

{ yt=2; ang--2;] 

if y>500{y-=2; angt=2; } 
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74 Player Power Up Creator 


Sometimes you may wish for your player to work hard 
to earn a powerup. This example requires the player 
mash the mouse buttons to unlock an upgrade. 

Create Event: 

spd=0; 


carget-1000; 


Larget reached-false; 


Step Event: 
if mouse check button pressed(mb left) 
{ 
spd+=5; 
} 
if mouse check button pressed(mb right) 
{ 
spd+=5; 
} 
if ‘target: reached: зра- 0. 24 
if spd>target 
{ 


Large. reached-trué; 
} 


if spd>target spd=target; 


if 5ра<0 spd=0; 


Draw Event: 
draw text (100,100, spd); 


if target reached 


{ 
draw text (100,150,"Target Reached"); 
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75 Coin Drop Bonus Effect 


Creates a cool looking graphical effect. First you'll 
need a control object to spawn the coins, for example 
with the following in a Step Event: 


if mouse check button pressed(mb left) 
{ 

repeat (10) 

{ 


instance create layer(x,y,"Effects",obj coin); 


show debug message ("spawned") 


) 


And the code for obj coin: Create Event: 
x-random range(100,1820); 

y--200 
distance-irandom range (200,1000); 


vspeed-random range (1,3); 


Step Event: 
if y»distance 
{ 
instance destroy(); 
effect create above(ef ring,x,y,5,c yellow); 


effect create above(ef firework,x-*12,yt*12,5,c red 


); 


effect create above(ef firework,x-12,y- 
12,5,c red); 


effect create above(ef firework,x-*12,y- 
I12,5,€ red); 


effect create above(ef firework,x- 
12,ү%12,5,с red); 


) 
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76 Endless Levels 


By using a static screen without views you can create 
an endless level by spawning instances off screen and 
for example moving them down. Example assumes a 
sprite 

Spawner object, Create Event: 
alarm[0]-game get speed(gamespeed fps) *3; 


Alarm 0 Event: 


alarm[0]-game get speed(gamespeed fps) *3+random(g 
ame get speed(gamespeed fps) *2); 


instance create layer (irandom_range(50,room width 
-950),-—300,"Island",ob] Island); 


obj island Create Event: 


sprite index-choose(Water Object 3,Water Object 4 
,Water Object 5,Water Object 6,Water Object 7,Wat 
er Object 8); 


vspeed-1; 
Step Event: 


if y»room height-*sprite height 
instance destroy(); 


You can use a similar approach for clouds, enemies etc. 
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77 Mini Healthbar With Segments 


inis 


Draws a healthbar with segments. 


Create Event: 
hp=5; 


max hp-hp; 


Draw Event: 
draw self(); 
draw set color(c black) 


draw healthbar (х-100,у-60,х+100,у-80, (100/ 
max hp)*hp,c white,c blue,c yellow,0,true,true); 


for (var i = 0; i < max Ер; i += 1) 
{ 


draw line (х-100+ (200/тах hp) *i, y-60,x- 
100+(200/max_hp) *і,у-80) 


1 
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78 Outline Shader 


Creates a white border around an instance. 


function outline _ init () 


{ 


uni size = shader get uniform(sh outline, 
Meque ys 

uni thick = 
shader get outline init()uniform(sh outline, 
"thick"); 

uni color = shader get uniform(sh outline, 
"oColor"); 

uni acc = shader get uniform(sh outline, 
"accuracy"); 

uni tol = shader get uniform(sh outline, 
"tol") H 

uni uvs = shader get unrtormish outline, 
"uys") ; 
} 
function Outline start () { 

var Spr; 

if (argument count«-2) spr = sprite index; 

else _spr = argument[2]; 


co 
СО 
СО 


var tex = sprite get texture( spr, 

image index); 
var w texture get texel width( tex); 
var h texture get texel height( tex); 
shader set uniform f(uni size, Мм, Hh); 
shader set uniform f(uni thick, argument[0]); 
shader set uniform. Е (uni, color, 
lor get red(argument[1])/255, 
lor get green (argument[1])/255, 


shader зеї (зһ outline); 


Var acc; 


lor get blue (argument[1])/255); 
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if (argument -Count<=3) асс = 16; 
else acc = argument[3]; 


shader set_uniform f(uni_acc, acc); 


var tol; 
if (argument count«-4) tol = 0; 
else tol = argument[4]; 


shader set uniform f(uni tol, tol); 


var uvs — sprite get uvs( spr, image index); 


shader set uniform f(uni uvs, uvs[0], uvs[1], 
uvs[2], uvs[3]); 


) 
function outline start surface() 41 
var sur = argument[2]; 


shader set(sh outline); 


var tex = surface get textured. sur); 
var w texture get texel width( tex); 
var h texture get texel height( tex); 


shader set uniform f(uni size, м, Hh); 


shader set uniform f(uni thick, argument[0]); 


shader set uniform f(uni color, 
color get red(argument[1]1)/255, 
color get green(argument[1])/255, 
color get blue (argument[1])/255); 


var acc; 
if (argument count«c«-3) acc = 16; 
else acc = argument[3]; 


shader set uniform f(uni acc, acc); 


var tol; 


if (argument count«-4) tol = 0; 


else tol = argument[4]; 
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shader set uniform. Е (uns. Болу tol); 


var uvs = texture get uvs( sur); 


shader set uniform f(uni uvs, uvs[0], uvs[1], 
uvs[2], uvs[3]); 


) 
function outline end() 
{ 

shader reéset(); 


) 


Shader vsh: 

/ / 

// Simple passthrough vertex shader 
// 


attribute vec3 in Position; 71 
(х,у,2) 


//attribute vec3 in Normal; // 
(х,у,2) unused in this shader. 


attribute vec4 in Colour; // 
(r,g,b,a) 


attribute vec2 in TextureCoord; 77 
(u, v) 


varying vec2 v vTexcoord; 


varying vec4 v vColour; 


void main() 


{ 


vec4 object space pos = vec4( in Position.x, 
in Posrtion.yy iN Position.Z; 10); 


gi Position = 
gm Matrices [MATRIX WORLD VIEW PROJECTION] * 
object space pos; 


у_уСо1ошг = in Colour; 
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v_vTexcoord = in TextureCoord; 


1 


Shader vsh: 

// 

// Simple passthrough fragment shader 
// 

varying vec2 v_vTexcoord; 


varying vec4 v_vColour; 


uniform vec2 size; 
uniform float thick; 
uniform vec3 oColor; 


uniform float accuracy; 


uniform float tol; 


uniform vec4 uvs; 


const float rad circle = 6.28319; 


void main() 


{ 


gl_FragColor = v vColour * 
texture2D( gm BaseTexture, ‘vi vTexcoord ); 


bool outline = false; 


for (float i=1.0; i«-thick; і++) { 


for (float d=0.0; d<rad circle; 
а+=гаа circle/accuracy)í 


vec2 check pos = v vTexcoord + 
i*vec2(cos(d)*size.x, -sin(d)*size.y); 


уес4 datPixel = v vColour * 
texture2D( gm BaseTexture, check pos); 
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bool out: bound = check pos.x < uvs.r 
|| check_pos.y < uvs.g || check_pos.x > uvs.b || 
check pos.y > uvs.a; 


if (datPixel.a>tol && 
gl FragColor.a«-tol && !out_bound) { 


outline = true; 


break; 


1 


if (outline) break; 


if (outline) gl FragColor = vec4(oColor.r, 
oColor.g, oColor.b, 1.0); 


) 


Example usage: 
outline start(12,c white); 


draw self(); 


outline end(); 
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79 Move Crosshair To Target 


This automatically selects a target and moves the 
crosshair to the target. 


Create Event: 


target=noone; 


alarm[0]-game get speed(gamespeed fps) /2; 
image speed=0; 

image index=0; 

Step Event: 


x=Clamp (х, 0, room width); 


y=clamp (у, 0, room height); 
if place meeting(x,y,obj parent) 
{ 


image index=1; 


else 


image index=0; 

} 

if target=noone 

{ 
with (obj parent) 
{ 


other.target=id; 
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Alarm 0 Event: 
with (obj parent) { 


if (in_view) { 


other.target=id; 


1 


with id active=true; 
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80 Spawn Items With Gap 


Sometimes you may want to place multiple instances in 
your room, which can laborious if you have multiple 
items. Below shows one method to place multiple 
instances with a gap inbetween. 


Create Event: 
pos=300; 
repeat (8) 

{ 


instance create layer (x- 
pos,y, "items", choose (obj big,obj pole,obj round) ) 


, 


instance create layer(x*tpos,y,"items",choose(obj 
big,obj pole,obj round)); 


post+=200; 
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ALSO AVAILABLE AS A 
PAPERBACK 
ANO 
KINOLE ВООК 
ON AMAZON 
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81 Add Scores To A List 


There may be times when you want to keep track of 
player score, for example in a darts game. This code 
keeps track of data. It could also be used to keep track 
of words. 

Create Event: 

Global. Tast=ds list. create); 


Step Event: 


//limit to 12 entries 


size=ds list. size(global.last); 


if size>12 
{ 
ds list delete (global :last, 0); 
1 
//for testing 
if mouse check button pressed(mb left) 


{ 


ds list add(global.last,irandom(1000)); 
} 


Draw Event: 


draw set colour(c white); 


var sice-ds list si2e6(globalclast); 
var i; 
for (і = 0; і < size; i += 1) 


{ 
draw _ text (900, 60+(32*i),global.last[ļ|i]);}; 
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82 Cloud Effect 


Create a cloud scrolling effect, great for above and 
below various layers in your game. 

Create Event: 

image speed=0; 

image index=choose(0,1,2); 
dir-choose(-1,-2,1,2); 

Step Event: 

x-xtdir; 


if x«-sprite width x-room width-*sprite width; 


if x»room width-*sprite width x--sprite width; 
And a Draw Event, so the cloud has some 
transparency: 


draw sprite ext(sprite index,image index,x,y,1,1, 
0,c_white,0.5); 


Just pop a few instances in your room and you’re good 
to go. 
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83 Ball Bouncing Off Instances 


A Simple method to make a ball bounce off of walls. 
This example requires a ball, plus two additional 
objects for top and bottom walls, plus one for side 
walls. This setup also gives a bit of randomisation with 
the angle when the ball bounces. 

Create Event: 

spd = 3; 

motion set (choose (130,310),spd); 

Collision Event with Top & Bottom walls: 


move bounce_all (true); 
Collision Event with Sides walls: 


move bounce_all (true); 


Collision Event with obj_ball: 


move bounce_all (true); 
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84 Keeping A Value In A Range 


There will be time when you wish to keep a value 
within a given range. This can be done with clamp. 
For example in a driving game when you wish stop the 
car leaving the room. 
Some example code in a Step Event, keeping the x 
value between 100 and 1000: 
if mouse check button(mb left) 

{ 

х-=5; 
} 


else if mouse check button (mb right) 


х+=5; 


x-clamp(x, 100, 1000); 
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85 Film Style Scrolling Credits 


Create scrolling text in a film style. Ideal for showing 
credits on game complete. 

obj spawner Create Event: 
list-ds 118% create); 

ds_list_add(list, 

"Example Text", 

"Add Your Own", 

"Game Credits" 

); 

alarm[0]-game get speed(gameéspeed fps)*3; 
Alarm 0 Event: 


if ds _list_size(list)=0 exit; 


alarm[0]=game_get_speed (gamespeed fps)*3; 
text=list[|0]; 
ds: list _delete(list,0); 


instance create layer(x,y,"text",obj text, 
{text : text}) 


obj_text Create Event: 
size=1; 
x-room width/2; 


y-room height+100; 
Step Event: 
ye 


if y«room height size--0.001; 


if size«0.01 instance destroy(); 
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Draw Event: 


draw set font(font text); 


draw set halign(fa center); 


draw set colour(c white); 


draw text ext transformed(x,y,text,4,1000,size,si 
е0); 
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86 Rotate Room View 


This method provides a great method for giving 
additional visual feedback to the player. Idea for a 
driving or flying game. Assumes the room has view 0 
set up. 
Create Event: 
ang=0; 
Step Event: 
if mouse check button(mb left) 
{ 

ang--; 


if ang«-60 ang=-60 
else 


angtt; 
if ang>60 ang=60; 
} 


camera set view angle(view camera[0],ang); 
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87 Toggle Full Screen 


There may be times when you want to allow the player 
to choice of full screen or windowed. The following 
allows the play to swap between the two using a key 
press. 
Step Event: 
if keyboard check (ога ("й")) 
{ 

if window get fullscreen ()=true 

{ 

window set fullscreen(false); 

} 

else if window get fullscreen()-fals 


{ 


window set fullscreen (true); 


127 


88 Progress Bar 


Sometimes it’s nice to show the player their level 
progress. It’s quite simple to do this visually. This 
example is for a side-scroller. Assumes starting x 
position is 0 and the target is the right end of the room. 
Draw Event: 

current y-obj player.y+250; 


| percent-(((room height-450)/ (room height- 
450))*current y)/(room height-450) 


Apercent-l00-(i(l- percent)*100) 
{ 


draw set color(c black) 


draw healthbar(180,1080-80,1580,1080-140,100- 
_percent,c white,c yellow,c yellow,0,true,true); 


for (var і = 0; i < 100; i += 1) 


{ 


draw line (180+ (1400/100) *i,1080- 
80,180+ (1400/7100) *1, 1080-140) 


1 


draw rectangle(180,1080-80,1580,1080-140,true); 
} 
draw text (80,1080-110, "PROGRESS") ;; 
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89 Flash Player To Show Damage 


This example shows one method of visually showing a 
player that they have taken damage. This changes the 
player’s character to red. 
Create Event: 
can hit-true; 
Collision Event with whatever instance causes 
damage: 
If can hit 
{ 

health-=5; 


can hit-false; 


alarm[0]-game get speed(gamespeed fps); 
) 
Alarm 0 Event: 
can hit-true; 


Draw Event: 
if can hit-false 


{ 


draw sprite ext(sprite index, image index,x,y,1,1, 
0,c red,1); 


else 


draw _self(); 
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90 Fade Between Two Images 


This fades in and out two subimages. Great for making 
appealing looking text without the overhead of having 


to use multiple images. 


Create Event: 
alp=0; 
dir="up"; 
Step Event: 
if dir="up" 
{ 

а1р+=0.01; 
} 
if dir="down" 
{ 

alp-=0.01; 
} 


if аір>1 dir="down"; 


if аір<0 dir="up"; 


Draw Event: 


draw sprite ext(spr 1040,0,х,ү,1 


alp); 


draw sprite ext(spr 1о40,1,х,ү,1 


, 


,l,0,c white,l- 


;1,0,c white,alp) 


130 


91 Draw A Path As Circles 


A useful method of drawing a path as circles. Ideal for 
giving hints to the player. Assumes a path with id path 
has been created. 

Draw Event: 

var path = path; 

var pathLength = path get length( path); 


var spacing = 30; 
var dots = pathLength / spacing; 
var і = 0; 


repeat ( dots) 
{ 
var pos = 1 = (i 7 dots); 


draw circle(path get x( path, pos), 
path get y( path, ров), 8, false); 


FFL? 
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92 Simple Top Down Movement Control 


A 


simple top down movement control that uses a single 
mouse button. The good thing is that this leaves the 
right mouse button free for attacking. 

Create Event: 

dir=0 

speed=6; 

Step Event: 


if mouse check button(mb left) 


dirt=1; 
} 
else 
{ 

dir-=1; 


direction=dir; 


image angle=direction; 
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93 Laser To Target 


БН se Heo HP нА ран 


This draws a laser from the instance to a target,which 
in this example is the mouse’s x position. 

Create Event: 

size=0; 


segments=0; 


segment size-64; 
remainder=0; 
final xpos=0; 
subimage=0; 
Step Event: 
size=0; 


segments=0; 


segment size-64; 
remainder=0; 
final xpos=0; 


subimage=0; 
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Draw Event: 

draw_self(); 

for (var і = 0; i < segments; i += 1) 
{ 


draw sprite(spr laser, subimage, х+ 
(segment size*i),y) 


} 
final xpos=segments*segment size; 


draw sprite part(spr laser, subimage, 0,0,remainder 
,oo,xtfinal xpos, y-(27)); 
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94 Bubble Explosion Effect 


Here’s a simple effect that makes a load of bubbles 
great for an underwater themed game (or use 
something other than bubbles to match your theme). 


Spawn code: 
repeat (20) 
{ 


inst=instance create layer(x,y,"bubbles", 
obj bubble); 


inst.direction-irandom(360); 


inst.speed-random range(1,4); 


obj bubble: 


Create Event: 
gravity--0.1; 


alarm[0]-game get speed(gamespeed fps)-* 
(random(game get speed(gamespeed fps))) 


. 
, 


Alarm 0 Event: 
snd=choose (bub1, bub2, bub3, bub4, bub5, bub6, bub7) ; 
audio play sound(snd,1, false); 


instance destroy(); 
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95 Add Instances To A Grid & Move To 
A Target 


Below is a simple method of making a grid with areas 
that are not allowed. It then makes a path to a random 
instance. 


Create Event: 


grid = mp grid create(0, 0, room width / 128, 
room height / 128, 128, 128); 


mp grid add instances(grid, obj block, true); 


path - path add(); 


mp grid path(grid, path, x, y, obj melon.x, 
obj melon.y, 1); 


path start(path,3,path action stop,true); 


You could then create another target and reuse the 
above code. 
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96 Image Scale, Fade and Rotate Effect 


An effect that can be used for a variety reasons. 


Assumes a sprite assigned that is 512x512 in size and 
origin as middle center. 

Example spawn code: 

if mouse check button pressed(mb left) 

{ 


instance create layer (room width/2,room height/ 
27 Effects" obj -effect); 


} 
obj_effect 


Create Event: 
size=0.1; 

alp=1; 
dir=choose(-1,1); 
angle=0; 

Step Event: 
Ssize+=0.05; 
alp-=0.01; 
anglet=dir*3; 

if аір<0 instance destroy(); 
Draw Event: 


draw sprite ext(sprite index,0, (room width/ 
2)*90,room height/2,size,size,angle,c white,alp); 
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97 Player Streak 


Keep tracks of a player’s streak, for example the 
number of enemies killed without missing. 
Create Event: 


streak=0; 


Step Event (testing example): 
if mouse check button pressed(mb right) 
{ 
//call the folling to add to streak 
streak++; 
} 
if mouse check button pressed(mb left) 
{ 
//call the folling to reset streak 
streak=0 


1 


Draw Event example: 
draw set colour(co black); 


draw text(200,200,"Streak: "+string(streak) ); 
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98 Numbers As Text 


This script will change digits to text, for example 
16783 to sixteen thousand seven hundred and eighty 
three. Works upto 999999 

function integer то english (int) { 


// Lookup tables 


Static’. саза tes: Sty one, "tino: Mpppeev, 
"four", "five", "six", "seven", "eight", "nine"]; 


static teens = ["ten", "eleven", "twelve", 


"thirteen", "fourteen", "fifteen", "sixteen", 
"seventeen", "eighteen", "nineteen"]; 


static tens -— "T, "",. "twenty", "леу", 
"forty", "fifty", "sixty", "seventy", "eighty", 
"ninety"]; 


// Decompose digits 


var thousands - (int div 1000) mod 1000; 
var hundreds = (int div 100) mod 10; 

var tens = (int div 10) mod 10; 

var units - int mod 10; 


// Accumulator 


var str = ""; 


// Add thousands 
if (thousands > 0) { 


str += integer to english(thousands) + " 
thousand"; 


) 
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// Add hundreds 
if (hundreds > 0) { 


LE (sth ТН "ЛОРД 


str += " LU 4 


1 


str += digits. [hundreds] + " hundred"; 


// Add tens and digits 
if (int mod 100 > 0) { 


Wo ДӨ КЕ Wm) 


str += " and "; 
) 
switch (tens) { 
case 0: 
str += _а191©з5_[ип1©5]; 
break; 
case 1: 
str += teens [units]; 
break; 
default: 
str += tens_ [tens]; 
if (units > 0) { 


str += " " + digits [units]; 


break; 


} 
// Done 


return-.scr; 
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99 Draw Lives As Images 


ААА ЛД 


This draws the players lives as images. 


Create Event: 
lives=8; 
Step Event for testing: 
if mouse check button pressed(mb left) 
{ 
lives--; 
} 
if mouse check button pressed(mb right) 
{ 


1іуеѕ++; 


Draw Event: 
for (var і = 0; i < lives; i += 1) 
{ 
draw sprite(spr Һеагі, 0,100+ (1*140),100); 
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100 Coin Explosion Effect 


The following is a cool explosion effect, great when 
collecting coins. 


for (var i= 0; і < 36 1 += 1) 


{ 


inst=instance create layer(x,y,"effect",obj coin _ 
effect); 


inst.direction-i*10 


inst.speed=1; 


1 


And in outside_room Event: 


instance destroy(); 
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101 Text With Gradient 


HELLO WEHLD 


This script draws gradient text with a border. Great for 
game titles, game-over screen etc.. 
function 


draw text gradient (xpos, ypos,mess, sep, wid, bordcol 
,gradcoll,gradcol2,alp) 


{ 


4- rz 4- 


draw text ext colour (xpos+2, ypost+2,mess, sep, 
wid,bordcol,bordcol,bordcol,bordcol,alp); 


4- rz 4- 


draw text ext colour (xpos+2, ypos-2,mess, sep, 
wid,bordcol,bordcol,bordcol,bordcol,alp); 


+ + + 


draw text ext colour(xpos-2, ypost+2,mess, sep, 
wid,bordcol,bordcol,bordcol,bordcol,alp) ; 


а- 4- 4- 


draw text ext colour(xpos-2, ypos-2,mess, sep, 
wid,bordcol,bordcol,bordcol,bordcol,alp); 


а- 4- 4- 


draw text ext colour(xpos, ypos,mess, sep, 
wid, gradcoll,gradcol2,gradcoll,gradcol2,alp) 


1 


Which you can call from a Draw Event with: 


draw text gradient (room width/2-300,300,"Hello 
World",124,1900,c black,c yellow,c red,1) 
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